open Test_char
let v = caml_is_printable 'a'
